home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / MPW Oberon 2.1168 / OInterfaces / Start.mod < prev    next >
Encoding:
Text File  |  1995-08-07  |  2.1 KB  |  96 lines  |  [TEXT/MPS ]
  1. (*
  2.      File:        Start.mod
  3.  
  4.      Contains:    Start Manager Interfaces.
  5.  
  6.      Version:    Technology:    System 7.5
  7.                  Package:    Universal Interfaces 2.0 in “MPW Latest” on ETO #17
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs.applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. *)
  19.  
  20. (*$TAGS-*)
  21. (*$CALLING PASCAL*)
  22. MODULE Start;
  23.  
  24. IMPORT SYSTEM, Types;
  25.  
  26. (* $PUSH*)
  27. (* $ALIGN MAC68K*)
  28. (* $LibExport+*)
  29.  
  30. TYPE
  31.     DefStartRec* = RECORD
  32.         (*ΔΔ CASE INTEGER OF
  33.         0: ( *)
  34.             sdExtDevID*:                    Types.SignedByte;
  35.             sdPartition*:                Types.SignedByte;
  36.             sdSlotNum*:                    Types.SignedByte;
  37.             sdSRsrcID*:                    Types.SignedByte;
  38.            (*ΔΔ );
  39.         1: (
  40.             sdReserved1*:                Types.SignedByte;
  41.             sdReserved2*:                Types.SignedByte;
  42.             sdRefNum*:                    INTEGER;
  43.            );*)
  44.     END;
  45.  
  46.     DefStartPtr* = POINTER TO DefStartRec;
  47.  
  48.     DefVideoRec* = RECORD
  49.         sdSlot*:                    Types.SignedByte;
  50.         sdsResource*:            Types.SignedByte;
  51.     END;
  52.  
  53.     DefVideoPtr* = POINTER TO DefVideoRec;
  54.  
  55.     DefOSRec* = RECORD
  56.         sdReserved*:                Types.SignedByte;
  57.         sdOSType*:                Types.SignedByte;
  58.     END;
  59.  
  60.     DefOSPtr* = POINTER TO DefOSRec;
  61.  
  62.  
  63. PROCEDURE GetDefaultStartup*(paramBlock: DefStartPtr);
  64.     (*$IF NOT GENERATINGCFM*)
  65.     INLINE PASCAL $205F, $A07D;
  66.     (*$END*)
  67. PROCEDURE SetDefaultStartup*(paramBlock: DefStartPtr);
  68.     (*$IF NOT GENERATINGCFM*)
  69.     INLINE PASCAL $205F, $A07E;
  70.     (*$END*)
  71. PROCEDURE GetVideoDefault*(paramBlock: DefVideoPtr);
  72.     (*$IF NOT GENERATINGCFM*)
  73.     INLINE PASCAL $205F, $A080;
  74.     (*$END*)
  75. PROCEDURE SetVideoDefault*(paramBlock: DefVideoPtr);
  76.     (*$IF NOT GENERATINGCFM*)
  77.     INLINE PASCAL $205F, $A081;
  78.     (*$END*)
  79. PROCEDURE GetOSDefault*(paramBlock: DefOSPtr);
  80.     (*$IF NOT GENERATINGCFM*)
  81.     INLINE PASCAL $205F, $A084;
  82.     (*$END*)
  83. PROCEDURE SetOSDefault*(paramBlock: DefOSPtr);
  84.     (*$IF NOT GENERATINGCFM*)
  85.     INLINE PASCAL $205F, $A083;
  86.     (*$END*)
  87. PROCEDURE SetTimeout*(count: INTEGER);
  88.     EXTERNAL PASCAL;
  89. PROCEDURE GetTimeout*(VAR count: INTEGER);
  90.     EXTERNAL PASCAL;
  91.  
  92. (* $ALIGN RESET*)
  93. (* $POP*)
  94.  
  95.  END Start.
  96.